﻿<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
    <title></title>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

    <script type="text/javascript" src=""></script>

    <script type="text/javascript" src="/js/jquery-1.10.2.min.js"></script>

    <link rel="stylesheet" type="text/css" href="" />

    <script language="JavaScript" type="text/javascript">
        function getCode() {
            $.ajax({
                url: "http://www.baidu.com",
                data: {
            },
            success: function(data) {
                $("#iframe").html(data);
            }
        });
    }
    </script>

</head>
<body onload="return getCode();">
    <%
Response.Clear
Response.Write(getHtml("http://www.baidu.com"))
Response.End
Sub retHtml(url) '以HTML格式备份
	Set xh = CreateObject("Microsoft.XMLHTTP")
	xh.Open "GET",url,0
	xh.Send()
	Set MyStream=CreateObject("Adodb.Stream") 
	MyStream.Type = 1
	MyStream.Open 
	MyStream.Write xh.responseBody
	MyStream.Position = 0
	response.Clear
	response.BinaryWrite MyStream.Read
	Response.End
End Sub 

Function getHtml(url) '以HTML格式备份
	Set xh = CreateObject("Microsoft.XMLHTTP")
	xh.Open "GET",url,0
	xh.Send()
	Set MyStream=CreateObject("Adodb.Stream") 
	MyStream.Type = 2
	MyStream.Open 
	MyStream.WriteText xh.responseText
	MyStream.Position = 0
	getHtml=MyStream.ReadText
	MyStream.Close
End Function
    %>
    <div id="iframe">
    </div>
</body>
</html>
